Celestin Apprentice 7/Apprentice-Release7.iso/Environments/Small Eiffel 0.4.8/lib_std/pointer_ref.e

Text File | 1997-04-13 | 265 b | 17 lines | [TEXT/ttxt]

-- Part of SmallEiffel -- Read DISCLAIMER file -- Copyright (C)
-- Dominique COLNET and Suzanne COLLIN -- [e-mail]
--
class POINTER_REF

feature

   item: POINTER;

   set_item(value: like item) is
      do
     item := value;
      end;

end -- POINTER_REF